\subsection{MultiplicadorPorTipo}
\begin{lstlisting}
Object subclass: #MultiplicadorPorTipo
	instanceVariableNames: 'atacante defensor tipoAtaque'
	classVariableNames: ''
	poolDictionaries: ''
	category: 'PLP-TP-POO'
\end{lstlisting}

\subsubsection{Mensajes de Clase}
\textbf{atacando:} \textit{unPokemon} \textbf{a:} \textit{otroPokemon} \textbf{con:} \textit{unTipo}
\begin{lstlisting}
	|clase|
	
	clase := self subclasses 
		detect: [:unaClase | unaClase esPara: unPokemon tipo con: unTipo ] 
		ifNone: [self error: 'Mal ! No hay un multiplicador de tipo !!'].
					
	^clase new inicializarAtacando: unPokemon a: otroPokemon con: unTipo 
\end{lstlisting}


\subsubsection{Mensajes de Instancia}
\textbf{inicializarAtacando:} \textit{unPokemon} \textbf{a:} \textit{otroPokemon} \textbf{con:} \textit{unTipo}
\begin{lstlisting}
	atacante := unPokemon.
	defensor := otroPokemon.
	tipoAtaque := unTipo 
\end{lstlisting}

\bigskip

\textbf{value}
\begin{lstlisting}
	self subclassResponsibility 
\end{lstlisting}



\subsection{MultiplicadorPorTipoNormal}
\begin{lstlisting}
MultiplicadorPorTipo subclass: #MultiplicadorPorTipoNormal
	instanceVariableNames: ''
	classVariableNames: ''
	poolDictionaries: ''
	category: 'PLP-TP-POO'
\end{lstlisting}

\subsubsection{Mensajes de Clase}
\textbf{esPara:} \textit{unTipo} \textbf{con:} \textit{otroTipo}
\begin{lstlisting}
	^unTipo ~= otroTipo 
\end{lstlisting}

\subsubsection{Mensajes de Instancia}
\textbf{value}
\begin{lstlisting}
	^atacante tipo efectividadContra: defensor tipo nombre 
\end{lstlisting}


\subsection{MultiplicadorPorTipoPower}
\begin{lstlisting}
MultiplicadorPorTipo subclass: #MultiplicadorPorTipoPower
	instanceVariableNames: ''
	classVariableNames: ''
	poolDictionaries: ''
	category: 'PLP-TP-POO'
\end{lstlisting}

\subsubsection{Mensajes de Clase}
\textbf{esPara:} \textit{unTipo} \textbf{con:} \textit{otroTipo}
\begin{lstlisting}
	^unTipo = otroTipo 
\end{lstlisting}

\subsubsection{Mensajes de Instancia}
\textbf{value}
\begin{lstlisting}
	^(atacante tipo efectividadContra: defensor tipo nombre) * (3/2)
\end{lstlisting}